---
title: "Handwritten Postcard Meta-Analysis"
author: "Jose Gomez"
date: "2023-08-22"
output: html_document
---

```{r, setup, include=FALSE}
rm(list=ls())       # clear objects in memory
knitr::opts_knit$set(root.dir = '/Users/gomez/Library/CloudStorage/Dropbox/GOTV V/Replication Files/Data')
```

#setup clean working environment, packages and data
```{r}
library(tidyverse)
library(foreign) 
library(metafor) # meta-analysis package

handwritten_data <- read.csv("GOTV V Handwritten Postcard Data (collapsed).csv")
```

```{r}
rma(yi = Meta_b,
    sei= Meta_SE,
    method = "DL", 
    data= handwritten_data)
```
